home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 February / Macworld (1999-02).dmg / Games World / Hot Demos! / DroidWorks demo / dwCD.gob / mission_cog_00_sectorthrust.cog < prev    next >
Text File  |  1998-09-17  |  1KB  |  51 lines
  1. # DroidWorks Cog Script
  2. #
  3. # 00_SectorThrust.cog
  4. #
  5. # Thrust it!
  6. #
  7. # Desc:
  8. #    Kind of like the JK Sectorthrust, but different, because I wrote it.     
  9. #     Each Sector pair is tied to a vector. They all share the same thrust value.
  10. #
  11. #     11/10/97 [DGS]    Added to Tree
  12. #                Added  extra vectors
  13. #
  14. symbols
  15. message        startup    
  16.  
  17. vector        vec0        desc=thrust_direction
  18. vector        vec1        desc=thrust_direction
  19. vector        vec2        desc=thrust_direction
  20. vector        vec3        desc=thrust_direction
  21.  
  22.  
  23. float        speed=1.0    desc=thrust_speed
  24.  
  25. sector        sector0a    
  26. sector        sector0b    
  27. sector        sector1a    
  28. sector        sector1b    
  29. sector        sector2a    
  30. sector        sector2b    
  31. sector        sector3a    
  32. sector        sector3b    
  33. end
  34.  
  35.  
  36. code
  37.  
  38. //-----------------------------------------------------------------------------
  39.  
  40. startup:
  41.     if (sector0a >= 0) SectorThrust(sector0a, vec0, speed);
  42.     if (sector0b >= 0) SectorThrust(sector0b, vec0, speed);
  43.     if (sector1a >= 0) SectorThrust(sector1a, vec1, speed);
  44.     if (sector1b >= 0) SectorThrust(sector1b, vec1, speed);
  45.     if (sector2a >= 0) SectorThrust(sector2a, vec2, speed);
  46.     if (sector2b >= 0) SectorThrust(sector2b, vec2, speed);
  47.     if (sector3a >= 0) SectorThrust(sector3a, vec3, speed);
  48.     if (sector3b >= 0) SectorThrust(sector3b, vec3, speed);
  49.     return;
  50. end
  51.